{$CLEO .cs}
{$USE cleo+}
0000:


0362: remove_actor $PLAYER_ACTOR from_car_and_place_at  -824.6519 -6971.1362 7.81
 
model.Load(#HUNTLEY)
load_requested_models 
  stream_custom_script_from_label @SUB_SCRIPTED 0@
  get_last_created_custom_script 0@
    0@ = car.Create(  #HUNTLEY , -820.8555, -6976.2915, 7.81)
    car.Angle(0@ ) = 267.7013
    car.Health(0@)=10000 
      while true
      wait 0
        0E65: get_car_collision_intensity 0@ store_to 9@  
        0E66: get_car_collision_coordinates 0@ store_to 14@ 15@ 16@ 
        0AD1: show_formatted_text_highpriority "Last collision intensity is %.3f pos %.3f %.3f %.3f." time 1000 9@ 14@ 15@ 16@       
 
            if cheat "fail"
            then
                  break 
            end
    
      end 
      
      car.RemoveReferences(0@)
      show_styled_text "~r~You suck!" 2000 5 
 terminate_this_custom_script

:SUB_SCRIPTED
 show_text_box "Go drive a car and hit something"
 wait 3000
 show_text_box "but be careful"
 
 terminate_this_custom_script